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MEETING Seems our little ’door stops’ 
are maintaining quite a following, 
The JUNE meeting will be: at least that’s the indication we 
received from the Indy ’Fest. 
ons FRI., JUNE 12, 1987 If you missed the meeting, you 
missed an excellent report on the 
Mat: 7:30 P.M. biggest event in Timex Compterdon, 
“int COMMUNITY ROOM this year! There were lots of new 
FAR WEST FEDERAL S$ &@L things shown and announced. Looks 
OREGON CITY SHOPPING CENTER like an exciting year! 
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Sorry, no Secretary report 
this month. 


PORTLAND AREA TIME™M/SINCLAIR 
USERS (FATS) -- CORNER 
by Michael E—. Carver 


The Machine Code SIG is progressing 
quite well. From the response of 


those who have attended the 
sessions, I feel that we have 
finally reached our first 
significant plateau. There is still 
alot to be learned. Qnce again I 


want to thank Syd for providing 
excellent lessons' 


Don’t miss our mext meeting, 
Saturday, June 12th, ipm = - Spm at 
the Sylvania Campus of Fortland 
Community College. 


IMPORTANT: June is a month were PATS 
meets before CCAT/S! 


At the April meeting of CCAT/S a 
short discussion cf Expert Systeme 
was had. The following program is a 
quasi-expert system. By considering 
the input, the program will analyse 
the possibilities of a CCAT/S) or 
PAT/S meeting. See if you can follow 
the logic and discover how the 
program "thinks". I tried to include 
the same thought process us humble 
humans would use to deduct if a 
meeting is to be held. Give the 
program a try and if you have any 
questions, bring them to the next 
CCAT/S meeting. 


Extensive checks on the user’s input 
are not included in the program. The 
Only checks made are to insure that 
input is in a format the program’s 
"thought" process can use. 


1H REM KHEHKKKK KKK EK KKKEK HERR REE 
26 PEM * demi-expert system xK* 


TG REM ¥H¥¥ by wm. &. ta ver KK¥ 
4S REM KHHKKE KK ELEN YR KHER EKHRE 
S@ BORDER i: INK 7: PAPER 1: C 


LS 2: LET p=o8: LET c=¢d 
193 PRINT AT 3,15 INVERSE i; "De 
mi-Expert System to calculate" 
119 PRINT AT 4,15 INVERSE 15 "CC 
AT/S & FAT/S Regular Meetings” 
126 INPUT "Which group? "j; 9% 
139 PRINT AT 8,8; "Checthing for 
a "3 INVERSE 159%; INVERSE ee 1) 
eeting " 


Continued on page 
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BIAS & BYTES 
Sy: ROD GOWEN 


Heard any TS related news lately? 


Did you get any information in the 
mail from other users, user groups 
or vendors that may be of interest 


to our readers? If so, why not share 
it with us? We need all of the help 
that we can get. Please send any 
info that you might have to: Rod 
Gowen, C/O CCAT/S, 1419 1/2 ?P?th 
Street, Oregon City, OR 97645, or, 
Phone in at: 593/655-7484, 19 AM-19 
PM weekdays. I know that the entire 
user group will appreciate it! 


FEST! FEST! 
Well, 


FEST! FEST! FEST! FEST!! 
it’s over! 


and that there WILL be more! I will 
not dwell on it in this column as 
you can read about it elsewhere in 
this issue. Suffice it to say that 
if you did not go, you missed out on 
what had to be, the LARGEST single 
gathering of SINCLAIRITES in this 
country! 


AERCO-was at the Fest with a couple 
of new additions to their disk int- 
erface. They now have SPECTRUM comp- 
atability and the LROS function is 


nOw usable. The SPECTRUM is on disk 
and, at the time of the show, would 
only go to 32K. They expect to have 


it up to the full 48K by the end of 
May. There was an AERCO USERS meet- 
ing at which Jerry and Til were 
bombarded with questions for more 
than 2 hours! We did learn that the 
priority schedule is this: 1> Finish 
the SPECTRUM 2> Debug the RP/M disk 
and 3> Initialize the CHRS and DATAS 
as well as array saving. The time 
waS uncertain, but Jerry thought 
that he would be done early this 
fall. All of you Aerco users who 
want to upgrade to VERS. 9.9 ROM 
should send $19 to Aerco and request 
it. 


TIME DESIGNS MAGAZINE-was there and 
had sample copies of the new Mike De 
Sosa book, TAKING THE QUANTUM LEAP! 
At over 269 pages, it is a real nice 
piece of work, and I do mean WORK! I 
know what is involved in putting a 
book like that together' At $26.95 


postpaid, I think it is a bargain. 
Be sure to check with your local 
dealer, he may carry it. Or you may 


Order direct from TDM. 


RMG BBS NEWS!-The BBS is now running 
a TRIVIA contest! If you are the 
first caller to correctly answer the 
Trivia question each week, you can 
win a gift certificate from RNG! It 
may not seem like much, but it can 
help toward the phone bill! When you 
get on the BBS go to base E> @L 


G@ORNER to look for the question. 
Good Luck! Our first weeks’ winner 
was our own MICHAEL CARVER. The BBS 


is now running on 2 QUAD drives and 
has a data capacity of over 1.5MB on 
disk! There will soon be an online 
Catalog to make it easier to order. 
All that and the new, longer hours 
are making the RMG BBS the place to 
meet. Just call: (593)636-8972 any 
evening between & PM and 19 AM Pac- 
ific time. No password required. The 
set up is: 8 bit word, 1 stop bit, 
NO parity. 


LARKEN-disk interface for 

was shown at the Fest by 
there seemed to be a LOT of interest 
in the new 2 board system. I will 
not spend a lot of time on it this 
month, aS I described it here in 
detail last time. I did not, as was 
pointed out to me, give any prices! 
The 2 board system, the DOS cart and 
the controller card sell for $115.99 


the 2968 
RMG and 


plus $3 shipping from RMG and you 
can also order direct from LARKEN. 
The DOS cart for the other systems 


will sell for $65.99 plus $2 sh. 


LIBRARY NOTE:-If you have not looked 
into our group Library in a while, 
you are missing a great opportunity 
to gain a LOT of useful and valuable 
information. We are now exchanging 
newsletters with over 29 other 
groups in North America. There is a 
wealth of knowledge in these papers! 
I know that a lot of what they print 
is repeated from others, but you 
Cannot afford to miss the chance to 
find that 1 vital piece of info you 
may need! Just call 655-7484 to find 
out more. 19AM to 19PM Tues-Sat. 


We’ll have more BITS & BYTES for 
you next time! Until then, 
--KEEP ON T/Sing!!! 


DENSE FPACK BASIC 


Bill Jones 


Referense:"Speed Up Basic" in 
Plotter (4/87). The use of Boolean 
logic with BASIC has not heen 
covered well in computer Literature. 
(Ed. Boolean Logic, named after 
George Boole, who defined an algebra 
of logical operations, such as AND, 
OR, and NOT, on the two values true 
and false). The Timex Sinclair 
computers are very accomodating to 
Boolean logic. Almost any Boolean 
expression is acceptable when 
enclosed in brackets after any key 
word. Not only does such Logic 
expressions speed up BASIC programs, 
but memory usage for such 
expressions can he reduced as much 
as 7% per cent as compared with 
conventional BASIC expressions. 
Moreover, the use of Boolean can 
greatly reduce the need for multiple 
branching to sub-routines. Entire 
packages of subh-routines are 
contained in one line of 
programming. Such packages may 
contain an elaborate chain of IF 
THEN conditional statements, action 
programming, print statements, 
computations, GO SUBs and Machine 
code calls. TS-19000 users can do in 
one Line what would require 10 or 
more Lines of programming to 
accomplish, while TS-2@68 users can 
pack in much more. 


Enclosed are excerpts from one 
of my software manuals that explains 
some of the applications and rules 
of using Boolean Logic in BASIC 
programming. These are applicable to 
all computers, hut especially suited 
to the TS-14@0 and TS-2068. "Dense 
Fack" employs other memory saving 
techniques to hecome a means of 
incorporationg more functions ina 
BASIC program than would he possible 
using conventional methods of 
programming. In fact, the use of 
Dense Pack reduces memory 
requirements to that required for a 
Machine Code program that 
accomplishes the same functions, 
while retaining the user 
friendliness of BASIC. While speed 
of operation is considerably 


improved, it does not match the 
speed of Machine Code in execution. 


Sincerly, 


oO 


Bill Jones 


"Dense Pack" is an acronym, 
coined by yours truly, to give a 
name to a group of programming 
techniques. Dense Pack is inovations 
that use memory saving techniques 

Boolean ex Save 
tremendous amounts of program 
memory. Despite the bank switching 
capahilities of the TS-2968, most 
users do not have extra memory, and 
if such extra memory is ahoard, the 
machine can only address one hank at 
a time. So, we are stuck with a FREE 
RAM of 38652 bytes. This limitation 
requires extra ordinary techniques 
to pack in such comprehensive works 
as Smart Text. I will devote enough 
space to the subject to give you a 
start off. Then it should be fun to 
see what you can make of it for your 
own programming. Also, this will 
help when you are trying to decipher 


see Se 


the mixture of chinese and aribic oft J 


my program lines. While programming 
the first version of Smart Text, I 
ran out of FREE memory and had no 
room Left for Data Files. Now that 
wouldn’t be much use to anyone, 
would it! The application of Dense 
Pack cut the program length by half 
and allowed many more functions to 
he added. 

We start kinda Like the 
daughter’s wedding, with something 
old, something borrowed, and 
something new. You have read that 
less memory is used when variables 
are used for numbers. For short 
programs, it is not worth the 
effort. However for long programs 
such as Smart Text, it is well worth 
the effort to spend some memory to 
establish a table of variables to 
use over and over. You’d he 
surprised how many times a long 
program ises the numbers through 
20. Dense Pack sets up these numbers 
in a "Pseudo hex" table. The system 
lends itself to “counting on your 
pinkies" as does mos folks, even 
math professors. It goes like this: 


J 


UO 


00=@, oa=1l, ob=2, oc=3, through 
ou=29. Soon one’s mind adjusts to 
pseudo hex, and one finds oneself 
counting on fingers, using ‘a, bh, 
through u". Now I could have used 
»Seminole hex", where 1, 2, 3, 4, 5, 
IS *umi, coli, chani, coi, chocki", 
but most folks would have difficulty 
with Indian counting. Throughout the 
programming, this pseudo hex table 
is used to save lotsa memory. Rhen 
you see an "o" variable, you can 
count up the alphabet to interpret 
the number. 


Cy 


Dense Pack uses Boolean 

ression “IF THEN" 
expressions. The results are the 
same, but many Lines of programming 
are eliminated. Would you believe a 
dozen "IF THEN Conditions" in a 
single Line? Such a line would save 
about 75 per cent of memory used for 
conventional programming of the 12 
IF THENsS. Lets examine a typical 
"DENSE PACK" group of IF THEN 
conditions after a menu that has 9 
options. (212@ GO TO (z{oa OR z)o0ix 
VAL "20902"+(z=o0a)Kipt+(z=ob) kdmt 
(z=oc)K mlt+(z=od)®* VAL "2110"+ 
(z=ae)K VAL "4055"+(z=o0f)kbat(z=0qg) 
Kte+(z=oh)Xrpt+(z=oi)dxkfa). Note the 
pseudo hex vars “oa thru oi". Then 
some Line numbers are also 
represented by vars. But the big 
picture is the 16 IF THEN 
conditional that are stuffed into 
one line of programming. This 
eliminates nine Lines of programming 
that would normally be required. 


Also, the method saves 75 per cent 
of the memory required for 


conventional programming. The ‘IF 
THENS® are implied in each of the 
expressions enclosed in brackets. 
The CPU trips through the whole 
tulip patch and evaluates all 16 of 
the IF THEN conditions. 


DENSE PACK RULES: Yes, there 
are rules to observe. You must 
account for ALL POSSIBLE conditions. 
This Line would work: (10 FRINT 
(Hello" AND y=1) + ("Good Bye" AND 
y=2)>. BUT- if y should be something 
else than 1 or @, the CFU would take 
off looking for what to do. Since it 
could not find the solution, the 
last line of the whole program would 
likely be executed. A safer way of 


ul 


expressing would be: (10 PRINT 
(Hello"* AND y<2) + (Goodbye" AND 
y>1)>. Now here is an example of 
Dense Pack mixed with a conventional 
expression: (146 IF Z=1 THEN GO TO 
Ch=1)%100+(b=2)*200+(b<(1 OR bd 2410). 
Do You see the the protective 
measure in the last bracket? Another 
rule is, the factors within the 
brackets cannot be mixed. This line 
would not work: (10 GO SUB 

(a=) 200+ (b=1)K300). “a® and "b* 
cannot be evaluated within the same 
group. BUT, they caould as in: (19 
GO SUG (a¢(2)*260+(ad>1)*300: GO TO 
(h¢2)*4004+(b>1)%*500). 


from page = 
"Day of the Week? "id 


Continued 
149 INPUT 


$: IF LEN d®<3 THEN PRINT #15 "Ne 
ed 2 or more letters": PAUSE 299 
: GO TO 146 

1iS@ PRINT : PRINT "Qn "3 INVERS 
E isd; 

168 INPUT "Month ? "3m: IF LEN 
m$<3 THEN PRINT #13; "Need 3 or m 
ore letters": PAUSE 29098: GO TO 1 
68 

179 PRINT " "3 INVERSE 13m; 
189 INPUT "Day of the month? (1 
SSL35 pd 

199 PRINT " "3 INVERSE ti3d 

299 INPUT "Is the above correct 
? .C¥/n3," 3 xs 

219 IF x$="n" OR xSB="N" THEN GO 
TO 199 

199@ GO SUB 976932 

1@1G@ IF rB(1)<>"F" AND rsl(i TA 2 
»<>"SA" THEN GO TO 8gaG 

1926 LET c=r%$(1)="F" AND (d?7 AN 
D d¢15) 

1939 LET p=ersilt TQ 2)="SA" AND ¢ 
d>?7? AND d<15) 

1649 IF c=i1 AND (m#(3)="1" OR ms 


(3)="L") THEN GO TQ 8998 
1959 IF p=9 AND c=@ THEN GO TO 2 
BSS 
7G98 REM ¥*® Print meeting info ¥* 
7@G1iS DIM aB(S2): PRINT : PRINT B 
RIGHT 13; INVERSE 1i3;a%é: PRINT 
7@26 IF c=1 AND (g9$(1)="C" OR gS 
(1)="c") THEN GO TO 759¢ 
OSS IF c=1 THEN PRINT "No, 
e isn’t a "39%5" meeting”: 
"scheduled." 
7649 IF c=1 THEN PRINT : 
But there is a CCAT/S meeting",” 
on "3dS5" "Sms" "Gds GO TO 999g 
7OSE IF gS(1)="P" GR gR(1L)="p" T 
HEN GO TO 7562 
Continued on 


ther 
PRINT 


PRINT " 
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FEST NMOTES / 
& AF TERTHOUGATS 


bys ROD GOWEN 
Well, the GREAT EVENT is over! 


I can honestly say that I really 
enjoyed the whole weekend. Other 
than the fact that I got only about 
19 Aours sleep in # days, {tt was 
a super affair! I have done so tn a 
lot of places before, but I must do 
50 again here, give my h>eartiest 
thanks and congratulations to FRANK 
DAVIS, PAVL HOLMGREN and the rest of 
the FEST committee who worked so 
Aard to put this thing together and 
who made ft run s0 smooth! Over 
£9,999 manhours in the making! AND 
AT NO PAY! What dedication! WE THANK 
you! 


Tim Woods of TDA, along with Ais 
wife Stephanie were on the same 
Plane as my wife and I were. We left 
Portland at about 7 AN Friday, May 
£, 1987 and arrived tn Indianapolis 
at the hotel about 3 PMH Indy time. 
By # PA we were busy setting up our 
table and at 7 PM had to stop to get 
ready for a fine dinner that was to 
be held at & PH for all of the 
vendors and the committee. This was 
attended by well over 19% people. 
After the dinner, about 19:38 PN, we 
attended a @l dealer meeting. That 
ended at about £ AN. To bed we went, 
only to arise again at about 5 AN so 
that we could finish setting up the 
table before the public was allowed 
in at 9 AM. 


9 AN!- Iwas hoping that we would 
have a lot of people there, but was 
totally unprepared for the mass of 
Aumanity that fell upon the two 
exArbit rooms! By Ll AN it was wall- 
to-wall people! With over #7 dealers 
and user groups having tables, there 
were walkways about 5 feet wide and 
with an estimated 119% people there 
on Saturday, Nay 2, there was barely 
room to turn around. We were unable 
to get away for lunch so had room 
service bring some tn. After a FULL 
day of meeting and talking to hund- 
reds of people, most of whom we only 
knew from phone calls and letters, 
we were glad to see the doors close 


at &6 PS. After a little straitghten- 
ing up, we found our room and 
cleaned up for dinner. At PA, if 
attended the AERCO USERS meeting. 
This was a very iInformatiVe and 


active meeting where Jerry and Til 


of Aerco, fielded questions about 
their system and what the future 
will bring to the Aerco users. David 
Hill, Editor of the FD68 USER News- 
letter, was there with a slightly 
red face for not having gotten his 
newsletter out on time! He said that 
he hoped to have the next fssue out 
by the end of Nay. We Aope that he 
makes {t! Jerry was asked what was 
on the schedule for the future. His 
reply was that he had a priority 
list and that #1 on that list was to 
finish the SPECTRUM disk for the 
system. It was operational to 32K at 
the show but will be up to a “full 
48K soon. #2 on the Iitst was toa 
correct the “bugs” in the programs 
on the RP/A disk. #3 ts toa finish 
the DOS and ftrmplement the array 
Aandling so that you can save numer- 
fe and Character arrays. We hope 
that they get tt done as per the 
projected schedule. 


After the Aerco meeting, at about 
11:38 PS, I attended a mint meeting 
in the room of Leroy Watson, who had 
written a couple of uttltties for 
the Aerco system. I got copies of 
Ais DOS-64 which allows the use of 
OS-6¢4 from Zebra, with the Aerco 
system. The other was an easy to use 
bank switching routine for the 256K 
users. This meeting broke up at 
about 2 AN. 


A short nap and itt was 7 AM and time 
to get the table ready for Sundays’ 
crowd. At 9 AM the doors again open- 
ed up and we must have Ahad an add- 
tttonal 299-399 people who had not 
been there on Saturday! Even thought 
the show was not due to close until 
3 PA, I noticed that a tlot¢(?), TI 
Should say most, of the dealers were 
already packing up by 2 PN! Thais was 
the one thing that I found to be 
most distateful(?) to me of the 
whole show. I made mention to the 
committee that there ought to be a 
rule with this show as there its with 
most shows of this type, that WNO 
DEALER HAY START TO TEAR DOWN AND 


PACK UP UNTIL THE DOORS CLOSE TO THE 
PUBLIC! As soon as the public saw 
the dealers packing it in, the sust 
have said to themselves, “"Sust be 
over, let’s go home.”, and that is 
Just what they did! By #@ PH there 
was NO ONE LEFT fn our exAtbit room 
other than my wife and myself?! 


By 7:39 PSH we were done with packing 
up and storing our boxes for 
Shipment the next day, s0 we had a 
leftsurely dinner and turned tn at 
about midnight. We had to be up at 
3:38 ta get to the airport in tine 
to catch our 3:38 flight back to 
Portland. 


A few points: There were 24 seminars 
going on during the 2 day event. 
Some were duplicated and I hope that 
a lot of people got to hear what 
they wanted. I had planned on get- 
ting to at least 2 of these, but did 
not make any! The SAVG user group 
from WSilwaukte, Wisconsin, had 3 
video Cameras going during the show. 
fi in each of the seminar rooms and I 
was roaming around the exAtbit rooms 
for the 2 days. They say that there 
was over 27 Aours of tape shot and 
they plan to make copies of then 
available as soon as the editing ifs 
done. I have spoken for a set of 
these tapes and will then make them 
available to the group. 


I am sure that you will hAear and see 
much about the Fest in the weeks and 
months ahead, but, unless you were 
there, you will NEVER know what you 
aissed! 


See you at the next FEST?! ! 


MEMNBERSHIF LIST 


Please make these corrections/ 
additions to your 1987 membership 
list sent out in the May PLOTTER.- 


MIKE CARVER 
1916 N. E. 
PORTLAND, 
288-4626 


(SIG EDITOR) 
TILLAMOOK ST. 
OR 97212 


D. S. LEWIS 
285-8963 


Le. W. JACK ARMSTRONG 
4329 MAYWOOD PLACE 
257-6279 


GAYLEN BENCH 
253-1576 


DONALD & GWENN MALM 


FORREST ZUECHER 
1139 BLANKENSIP RD. 
WEST LYNN, OR 
695-6355 
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Continued from page 5 


“86S PRINT "No, 
gS;" meeting”: 


there isn’t a "3 
PRINT "scheduled. 


7879 PRINT PRINT "But there is 
a PAT/S meeting", "orn "3dBS" "Sm 

$3" "Sd: GO TO 99°98 

7568 PRINT "Yes there is a "39%; 
"meeting ","scheduled for "sd 
" "smS3" "sd: GO Ta 99g¢g 

SGae PRINT : PRINT PRINT FLASH 
13; "%*¥"; FLASH @3" There are NO 

regular meetings” 

8919 PRINT "scheduled fori": PRI 

NT : PRINT d#3" "sme3" "3d 

€s2¢@ PAUSE @: RUN 

S860 PEM ** Format d& before 

SGiG REM **¥ checking reply 

98329 DIM rSB( LEN dt): FOR x=1 TO 

LEN dG: LET r(x) =d#(x) 

9S=IG IF CODE d(x) >9@ THEN LET r 

S(x)=CHRS (CODE d#(x)-32) 

9949 NEXT x 

9852 RETURN 

99°39 PRINT PRINT BRIGHT 13; INV 

ERSE ls;a%: PAUSE @: RUN ? 


om ann nn a a nn on a nan ne ne ne ne ee SL) 


MEETING NOTICE 
DID YOU NOTE THAT THIS IS A COMBIN 
JUNE-JULY ISSUE?? NO MEETING IN 
JULY--NO MEETING NOTICES WILL BE 
MAILED. LOOK FOR THE AUGUST PLOTT 


WITH MEETING NOTICE-~AUGUST 14. 


- 
s 
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REE BRSRSRSR SE 
FROMnM THE 
EPRPrILTORS DESK TI was also informed that a 
THE PLOTTER has a new late night time arriver requireing 
contributor, Bill Jones, who has an information from the head office 
article on advanced programming in computer will cancel a game and UO 
BASIC. It may require some study on could produce an irrate employee who 
the reader’s part to follow through is on a winning streak, requiring a 
his discussion. The material is start from scratch. 
exerpted from his user manual that Living in an agricultural area 
is provided with has program, SMART has it laughs at times. Recently my 
TEXT. The Editor appreciated his wife was following, at a discrete 
contribution as the newsletter would distance, an old farm truck well 
be short that much without it. Loaded with manure. Deciding a safe 
I recently learned of an moment to pass, upon doing so she 
unusual use for computer terminals. noticed a nice sign on the hack of 
I have a membership in a campground the truck reading "AVON CALLING"! 
organization where some 23 Her chuckle for the day. 


campgrounds now are provided with 
computers that are mainly terminals 
at this time. The head office is in 
Bellview Washington. These are used 
mainly for such things as making and 
transmitting reservations. The 
computers are located at the guard 
station at the entrance of each 
campground. Ohviously this is a 
lonesome job at night with little 


SUBSCRIPTION RATES 


FREE SUBSCRIPTION WITH PAID 
CCAT/S MEMBERSHIP-$15.00/YR 
NON-MEMBER RATE - $ 8.5@0/YR 


activity unless a late arriver show AD RATES 
UP» xKKX 

Well, there are now 6 games put FOUR LINE CLASSIFIED FRE 
into the head office computer when WITH MEMBERSHIP 
that office closes. With modem 2 2 en nee ene 
connections, any of these 6 games $ ~5@ / LINE 
are accessable to the terminals. $ 5.0@ / 1/4 PAGE 
When things are quiet the night $ 8.00 / 1/72 PAGE 
attendant can go at it! I was told $ 15.00 / FULL PAGE 
that the company is working on an 
expansion of the game called ALL AD COFY MUST BE IN BY 
Battleship that will permit players THE 1@TH OF THE MONTH PRIOR 
to play against each other, not just TO THE MONTH AD IS TO RUN. 


the computer. 
HRRHHHHHHHRAHHHHHHRHHHR RRA -O- HH HHH HHH 


ccaTssSs 
1419 1/2 7TH Street 
Oregon City, OR 97045 


ROD GOWEN (TREASURER) 
1419; 4/2-Z2TH. STREET 
OREGON CITY, OR 97945 ] 
A9003212<87/ML 


